home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Muzyka / Edytory sampli (probek dzwieku) / ZynAddSubFX_2.2.0 / Setup_ZynAddSubFX-2.2.0.exe / source code / UI / ResonanceUI.fl < prev    next >
Text File  |  2005-03-14  |  11KB  |  393 lines
  1. # data file for the Fltk User Interface Designer (fluid)
  2. version 1.0106 
  3. header_name {.h} 
  4. code_name {.cc}
  5. decl {//Copyright (c) 2002-2005 Nasca Octavian Paul} {} 
  6.  
  7. decl {//License: GNU GPL version 2} {} 
  8.  
  9. decl {\#include <FL/Fl_Box.H>} {public
  10. } 
  11.  
  12. decl {\#include <FL/fl_draw.H>} {public
  13. } 
  14.  
  15. decl {\#include <FL/Fl_Value_Output.H>} {public
  16. } 
  17.  
  18. decl {\#include <math.h>} {} 
  19.  
  20. decl {\#include <stdio.h>} {} 
  21.  
  22. decl {\#include <stdlib.h>} {} 
  23.  
  24. decl {\#include <string.h>} {} 
  25.  
  26. decl {\#include "../Synth/Resonance.h"} {public
  27. } 
  28.  
  29. decl {\#include "WidgetPDial.h"} {public
  30. } 
  31.  
  32. decl {\#include "PresetsUI.h"} {public
  33. } 
  34.  
  35. class ResonanceGraph {: {public Fl_Box}
  36. } {
  37.   Function {ResonanceGraph(int x,int y, int w, int h, const char *label=0):Fl_Box(x,y,w,h,label)} {} {
  38.     code {respar=NULL;
  39. cbwidget=NULL;
  40. applybutton=NULL;} {}
  41.   }
  42.   Function {init(Resonance *respar_,Fl_Value_Output *khzvalue_,Fl_Value_Output *dbvalue_)} {} {
  43.     code {respar=respar_;
  44. khzvalue=khzvalue_;
  45. dbvalue=dbvalue_;
  46. oldx=-1;
  47. khzval=-1;} {}
  48.   }
  49.   Function {draw_freq_line(REALTYPE freq,int type)} {} {
  50.     code {REALTYPE freqx=respar->getfreqpos(freq);
  51. switch(type){
  52.   case 0:fl_line_style(FL_SOLID);break;
  53.   case 1:fl_line_style(FL_DOT);break;
  54.   case 2:fl_line_style(FL_DASH);break;
  55. }; 
  56.  
  57.  
  58. if ((freqx>0.0)&&(freqx<1.0))
  59.    fl_line(x()+(int) (freqx*w()),y(),
  60.    x()+(int) (freqx*w()),y()+h());} {}
  61.   }
  62.   Function {draw()} {} {
  63.     code {int ox=x(),oy=y(),lx=w(),ly=h(),i,ix,iy,oiy;
  64. REALTYPE freqx;
  65.  
  66. fl_color(FL_BLACK);
  67. fl_rectf(ox,oy,lx,ly);
  68.  
  69.  
  70. //draw the lines
  71. fl_color(FL_GRAY);
  72.  
  73. fl_line_style(FL_SOLID);
  74. fl_line(ox+2,oy+ly/2,ox+lx-2,oy+ly/2);
  75.  
  76. freqx=respar->getfreqpos(1000.0);
  77. if ((freqx>0.0)&&(freqx<1.0))
  78.    fl_line(ox+(int) (freqx*lx),oy,
  79.     ox+(int) (freqx*lx),oy+ly);
  80.  
  81. for (i=1;i<10;i++){
  82.    if(i==1){
  83.      draw_freq_line(i*100.0,0);
  84.      draw_freq_line(i*1000.0,0);
  85.    }else 
  86.     if (i==5){
  87.       draw_freq_line(i*100.0,2);
  88.       draw_freq_line(i*1000.0,2);
  89.     }else{
  90.       draw_freq_line(i*100.0,1);
  91.       draw_freq_line(i*1000.0,1);
  92.     };
  93. };
  94.  
  95. draw_freq_line(10000.0,0);
  96. draw_freq_line(20000.0,1);
  97.  
  98. fl_line_style(FL_DOT);
  99. int GY=10;if (ly<GY*3) GY=-1;
  100. for (i=1;i<GY;i++){
  101.    int tmp=(int)(ly/(REALTYPE)GY*i);
  102.    fl_line(ox+2,oy+tmp,ox+lx-2,oy+tmp);
  103. };
  104.  
  105.  
  106.  
  107. //draw the data
  108. fl_color(FL_RED);
  109. fl_line_style(FL_SOLID);
  110. oiy=(int)(respar->Prespoints[0]/128.0*ly);
  111. for (i=1;i<N_RES_POINTS;i++){
  112.    ix=(int)(i*1.0/N_RES_POINTS*lx);
  113.    iy=(int)(respar->Prespoints[i]/128.0*ly);
  114.    fl_line(ox+ix-1,oy+ly-oiy,ox+ix,oy+ly-iy);
  115.    oiy=iy;
  116. };} {}
  117.   }
  118.   Function {handle(int event)} {return_type int
  119.   } {
  120.     code {int x_=Fl::event_x()-x();
  121. int y_=Fl::event_y()-y();
  122. if ( (x_>=0)&&(x_<w()) && (y_>=0)&&(y_<h())){
  123.    khzvalue->value(respar->getfreqx(x_*1.0/w())/1000.0);
  124.    dbvalue->value((1.0-y_*2.0/h())*respar->PmaxdB);
  125. };
  126.  
  127. if ((event==FL_PUSH)||(event==FL_DRAG)){
  128.   int leftbutton=1;
  129.   if (Fl::event_button()==FL_RIGHT_MOUSE) leftbutton=0;
  130.   if (x_<0) x_=0;if (y_<0) y_=0;
  131.   if (x_>=w()) x_=w();if (y_>=h()-1) y_=h()-1;
  132.  
  133.   if ((oldx<0)||(oldx==x_)){
  134.     int sn=(int)(x_*1.0/w()*N_RES_POINTS);
  135.     int sp=127-(int)(y_*1.0/h()*127);
  136.     if (leftbutton!=0) respar->setpoint(sn,sp);
  137.         else respar->setpoint(sn,64);
  138.   } else {
  139.     int x1=oldx;
  140.     int x2=x_;
  141.     int y1=oldy;
  142.     int y2=y_;
  143.     if (oldx>x_){
  144.       x1=x_;y1=y_;
  145.       x2=oldx;y2=oldy;
  146.     };
  147.    for (int i=0;i<x2-x1;i++){
  148.       int sn=(int)((i+x1)*1.0/w()*N_RES_POINTS);
  149.       REALTYPE yy=(y2-y1)*1.0/(x2-x1)*i;
  150.       int sp=127-(int)((y1+yy)/h()*127);
  151.       if (leftbutton!=0) respar->setpoint(sn,sp);
  152.          else respar->setpoint(sn,64);
  153.     };
  154.   };
  155.  
  156.   oldx=x_;oldy=y_;
  157.   redraw();
  158. };
  159.  
  160. if (event==FL_RELEASE) {
  161.     oldx=-1;
  162.     if (cbwidget!=NULL) {
  163.         cbwidget->do_callback();
  164.         if (applybutton!=NULL) {
  165.             applybutton->color(FL_RED);
  166.             applybutton->redraw();
  167.  
  168.         };
  169.     };
  170. };
  171.  
  172. return(1);} {selected
  173.     }
  174.   }
  175.   Function {setcbwidget(Fl_Widget *cbwidget,Fl_Widget *applybutton)} {} {
  176.     code {this->cbwidget=cbwidget;
  177. this->applybutton=applybutton;} {}
  178.   }
  179.   decl {Fl_Value_Output *khzvalue;} {}
  180.   decl {Fl_Value_Output *dbvalue;} {}
  181.   decl {Resonance *respar;} {}
  182.   decl {int oldx,oldy;} {}
  183.   decl {REALTYPE khzval;} {public
  184.   }
  185.   decl {Fl_Widget *cbwidget,*applybutton;} {}
  186. } 
  187.  
  188. class ResonanceUI {: PresetsUI_
  189. } {
  190.   Function {make_window()} {} {
  191.     Fl_Window resonancewindow {
  192.       label Resonance
  193.       xywh {45 259 780 305} type Double visible
  194.     } {
  195.       Fl_Value_Output khzvalue {
  196.         label kHz
  197.         xywh {415 264 45 18} align 8 minimum 0.001 maximum 48 step 0.01 textfont 1
  198.         code0 {//this widget must be before the calling widgets}
  199.       }
  200.       Fl_Value_Output dbvalue {
  201.         label dB
  202.         xywh {415 282 45 18} align 8 minimum -150 maximum 150 step 0.1 textfont 1
  203.         code0 {//this widget must be before the calling widgets}
  204.       }
  205.       Fl_Group {} {
  206.         xywh {6 5 768 256} box BORDER_BOX
  207.         code0 {rg=new ResonanceGraph(o->x(),o->y(),o->w(),o->h(),"");}
  208.         code1 {rg->init(respar,khzvalue,dbvalue);}
  209.         code2 {rg->show();}
  210.       } {}
  211.       Fl_Button {} {
  212.         label Close
  213.         callback {resonancewindow->hide();}
  214.         xywh {690 283 84 17} box THIN_UP_BOX
  215.       }
  216.       Fl_Button {} {
  217.         label Zero
  218.         callback {for (int i=0;i<N_RES_POINTS;i++) 
  219.    respar->setpoint(i,64);
  220. resonancewindow->redraw();
  221. redrawPADnoteApply();}
  222.         tooltip {Clear the resonance function} xywh {491 264 66 15} box THIN_UP_BOX labelfont 1
  223.       }
  224.       Fl_Button {} {
  225.         label Smooth
  226.         callback {respar->smooth();
  227. resonancewindow->redraw();
  228. redrawPADnoteApply();}
  229.         tooltip {Smooth the resonance function} xywh {491 282 66 18} box THIN_UP_BOX labelfont 1
  230.       }
  231.       Fl_Check_Button enabled {
  232.         label Enable
  233.         callback {respar->Penabled=(int) o->value();
  234. redrawPADnoteApply();}
  235.         xywh {6 270 78 27} box THIN_UP_BOX down_box DOWN_BOX
  236.         code0 {o->value(respar->Penabled);}
  237.       }
  238.       Fl_Roller maxdb {
  239.         callback {maxdbvo->value(o->value());
  240. respar->PmaxdB=(int) o->value();
  241. redrawPADnoteApply();}
  242.         xywh {90 282 84 15} type Horizontal minimum 1 maximum 90 step 1 value 30
  243.       }
  244.       Fl_Value_Output maxdbvo {
  245.         label {Max.}
  246.         callback {o->value(respar->PmaxdB);}
  247.         tooltip {The Maximum amplitude (dB)} xywh {126 264 24 18} minimum 1 maximum 127 step 1 value 30 textfont 1
  248.         code0 {o->value(respar->PmaxdB);}
  249.       }
  250.       Fl_Box {} {
  251.         label dB
  252.         xywh {150 264 24 18}
  253.       }
  254.       Fl_Value_Output centerfreqvo {
  255.         label {C.f.}
  256.         callback {o->value(respar->getcenterfreq()/1000.0);}
  257.         tooltip {Center Frequency (kHz)} xywh {210 264 33 18} when 3 minimum 1 maximum 10 step 0.01 value 1 textfont 1
  258.         code0 {o->value(respar->getcenterfreq()/1000.0);}
  259.       }
  260.       Fl_Value_Output octavesfreqvo {
  261.         label {Oct.}
  262.         callback {o->value(respar->getoctavesfreq());}
  263.         tooltip {No. of octaves} xywh {210 282 33 18} when 3 minimum 1 maximum 127 step 1 value 30 textfont 1
  264.         code0 {o->value(respar->getoctavesfreq());}
  265.       }
  266.       Fl_Button {} {
  267.         label RND2
  268.         callback {respar->randomize(1);
  269. resonancewindow->redraw();
  270. redrawPADnoteApply();}
  271.         tooltip {Randomize the resonance function} xywh {566 276 42 12} box THIN_UP_BOX labelfont 1 labelsize 10
  272.       }
  273.       Fl_Button {} {
  274.         label RND1
  275.         callback {respar->randomize(0);
  276. resonancewindow->redraw();
  277. redrawPADnoteApply();}
  278.         tooltip {Randomize the resonance function} xywh {566 264 42 12} box THIN_UP_BOX labelfont 1 labelsize 10
  279.       }
  280.       Fl_Button {} {
  281.         label RND3
  282.         callback {respar->randomize(2);
  283. resonancewindow->redraw();
  284. redrawPADnoteApply();}
  285.         tooltip {Randomize the resonance function} xywh {566 288 42 12} box THIN_UP_BOX labelfont 1 labelsize 10
  286.       }
  287.       Fl_Check_Button p1st {
  288.         label {P.1st}
  289.         callback {respar->Pprotectthefundamental=(int) o->value();
  290. redrawPADnoteApply();}
  291.         tooltip {Protect the fundamental frequency (do not damp the first harmonic)} xywh {365 285 45 15} down_box DOWN_BOX labelsize 10
  292.         code0 {o->value(respar->Pprotectthefundamental);}
  293.       }
  294.       Fl_Button {} {
  295.         label InterpP
  296.         callback {int type;
  297. if (Fl::event_button()==FL_LEFT_MOUSE) type=0;
  298.        else type=1;
  299. respar->interpolatepeaks(type);
  300. resonancewindow->redraw();
  301. redrawPADnoteApply();}
  302.         tooltip {Interpolate the peaks} xywh {365 265 46 15} box THIN_UP_BOX labelfont 1 labelsize 10
  303.       }
  304.       Fl_Dial centerfreq {
  305.         label {C.f.}
  306.         callback {respar->Pcenterfreq=(int)o->value();
  307. centerfreqvo->do_callback();
  308. rg->redraw();
  309. redrawPADnoteApply();}
  310.         xywh {245 265 30 30} box ROUND_UP_BOX labelsize 10 maximum 127 step 1
  311.         code0 {o->value(respar->Pcenterfreq);}
  312.         class WidgetPDial
  313.       }
  314.       Fl_Dial octavesfreq {
  315.         label {Oct.}
  316.         callback {respar->Poctavesfreq=(int)o->value();
  317. octavesfreqvo->do_callback();
  318. rg->redraw();
  319. redrawPADnoteApply();}
  320.         xywh {280 265 30 30} box ROUND_UP_BOX labelsize 11 maximum 127 step 1
  321.         code0 {o->value(respar->Poctavesfreq);}
  322.         class WidgetPDial
  323.       }
  324.       Fl_Button {} {
  325.         label C
  326.         callback {presetsui->copy(respar);}
  327.         xywh {625 275 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 12 labelcolor 7
  328.       }
  329.       Fl_Button {} {
  330.         label P
  331.         callback {presetsui->paste(respar,this);}
  332.         xywh {655 275 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 12 labelcolor 7
  333.       }
  334.       Fl_Button applybutton {
  335.         label Apply
  336.         callback {applybutton->color(FL_GRAY);
  337. applybutton->redraw();
  338. if (cbapplywidget!=NULL) {
  339.     cbapplywidget->do_callback();
  340.     cbapplywidget->color(FL_GRAY);
  341.     cbapplywidget->redraw();
  342. };}
  343.         xywh {690 265 85 15} box THIN_UP_BOX labelfont 1 labelsize 12
  344.       }
  345.     }
  346.   }
  347.   Function {ResonanceUI(Resonance *respar_)} {} {
  348.     code {respar=respar_;
  349. cbwidget=NULL;
  350. cbapplywidget=NULL;
  351. make_window();
  352. applybutton->hide();} {}
  353.   }
  354.   Function {~ResonanceUI()} {} {
  355.     code {resonancewindow->hide();} {}
  356.   }
  357.   Function {redrawPADnoteApply()} {} {
  358.     code {if (cbwidget!=NULL) {
  359.     cbwidget->do_callback();
  360.     applybutton->color(FL_RED);
  361.     applybutton->redraw();
  362. };} {}
  363.   }
  364.   Function {setcbwidget(Fl_Widget *cbwidget,Fl_Widget *cbapplywidget)} {} {
  365.     code {this->cbwidget=cbwidget;
  366. this->cbapplywidget=cbapplywidget;
  367. rg->setcbwidget(cbwidget,applybutton);
  368. applybutton->show();} {}
  369.   }
  370.   Function {refresh()} {} {
  371.     code {redrawPADnoteApply();
  372.  
  373. enabled->value(respar->Penabled);
  374.  
  375. maxdb->value(respar->PmaxdB);
  376. maxdbvo->value(respar->PmaxdB);
  377.  
  378. centerfreqvo->value(respar->getcenterfreq()/1000.0);
  379. octavesfreqvo->value(respar->getoctavesfreq());
  380.  
  381. centerfreq->value(respar->Pcenterfreq);
  382. octavesfreq->value(respar->Poctavesfreq);
  383.  
  384. p1st->value(respar->Pprotectthefundamental);
  385.  
  386. rg->redraw();} {}
  387.   }
  388.   decl {Resonance *respar;} {public
  389.   }
  390.   decl {ResonanceGraph *rg;} {}
  391.   decl {Fl_Widget *cbwidget,*cbapplywidget;} {}
  392. } 
  393.